home *** CD-ROM | disk | FTP | other *** search
/ Delphi Magazine Collection 2001 / Delphi Magazine Collection 20001 (2001).iso / DISKS / ISSUE06 / CLINIC / DBLDLL.CPP next >
Encoding:
C/C++ Source or Header  |  1995-10-22  |  382 b   |  24 lines
  1. #include <windows.h>
  2.  
  3. int FAR PASCAL LibMain(HANDLE a, WORD b, WORD c, LPSTR d)
  4. {
  5.   if (c!= 0)
  6.     UnlockData(0);
  7.   return(1);
  8. }
  9.  
  10. int FAR PASCAL WEP(int a)
  11. {
  12.   return(1);
  13. }                         
  14.  
  15. extern "C" double FAR PASCAL _export TestFloatPascal(double d)
  16. {
  17.   return(d);
  18. }
  19.  
  20. extern "C" double FAR _cdecl _export TestFloatCDecl(double d)
  21. {
  22.   return(d);
  23. }
  24.